/* CUC Online Judge - A cross-platform judge online system
 * Base on [Verwandlung Online Judge](https://github.com/hzxie/voj)
 * Copyright (C) 2021 Jinhe Zhang <307100890@qq.com>
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 *
 *
 *                             /\/`\/\
 *                            _\ | | /_
 *                          -           -
 *                        /               \
 *                       | |-------------| |
 *                       | |^=-_#   #_-=^| |
 *                       \/ \O__/,_ \O__/ \/
 *                        \  \\\     \\\  /
 *                         _\     o     /_
 *                        |/ `--=___=--` \|
 *                       /              六 \
 *                      |  ____       __七_ |
 *                       \____/_\   /_\____/
 */
package org.verwandlung.voj.web.util;
import java.util.ArrayList;
import java.util.List;

/**
* DES加密/解密
*
* @Copyright Copyright (c) 2015
* @author liuyazhuang
* @see DESCore
*/
public class Des {
    public Des() {
    }
    /*
    public static void main(String[] args) {
        Des desObj = new Des();
        String key1 = "1";
        String key2 = "2";
        String key3 = "3";
        String data = "admin";
        String str = desObj.strEnc(data, key1, key2, key3);
        System.out.println(str);
        String dec = desObj.strDec(str, key1, key2, key3);
        System.out.println(dec);
    }
    */
    /**
    * DES加密/解密
    *
    * @Copyright Copyright (c) 2015
    * @author liuyazhuang
    * @see DESCore
    */
    /*
    * encrypt the string to string made up of hex return the encrypted string
    */
    public String strEnc(String data, String firstKey, String secondKey, String thirdKey) {
        int leng = data.length();
        String encData = "";
        List<int[]> firstKeyBt = null, secondKeyBt = null, thirdKeyBt = null;
        int firstLength = 0, secondLength = 0, thirdLength = 0;
        if (firstKey != null && firstKey != "") {
            firstKeyBt = getKeyBytes(firstKey);
            firstLength = firstKeyBt.size();
        }
        if (secondKey != null && secondKey != "") {
            secondKeyBt = getKeyBytes(secondKey);
            secondLength = secondKeyBt.size();
        }
        if (thirdKey != null && thirdKey != "") {
            thirdKeyBt = getKeyBytes(thirdKey);
            thirdLength = thirdKeyBt.size();
        }
        if (leng > 0) {
            if (leng < 4) {
                int[] bt = strToBt(data);
                int[] encByte = null;
                if (firstKey != null && firstKey != "" && secondKey != null && secondKey != "" && thirdKey != null && thirdKey != "") {
                    int[] tempBt;
                    int x, y, z;
                    tempBt = bt;
                    for (x = 0; x < firstLength; x++) {
                        tempBt = enc(tempBt, (int[]) firstKeyBt.get(x));
                    }
                    for (y = 0; y < secondLength; y++) {
                        tempBt = enc(tempBt, (int[]) secondKeyBt.get(y));
                    }
                    for (z = 0; z < thirdLength; z++) {
                        tempBt = enc(tempBt, (int[]) thirdKeyBt.get(z));
                    }
                    encByte = tempBt;
                } else {
                    if (firstKey != null && firstKey != "" && secondKey != null && secondKey != "") {
                        int[] tempBt;
                        int x, y;
                        tempBt = bt;
                        for (x = 0; x < firstLength; x++) {
                            tempBt = enc(tempBt, (int[]) firstKeyBt.get(x));
                        }
                        for (y = 0; y < secondLength; y++) {
                            tempBt = enc(tempBt, (int[]) secondKeyBt.get(y));
                        }
                        encByte = tempBt;
                    } else {
                        if (firstKey != null && firstKey != "") {
                            int[] tempBt;
                            int x = 0;
                            tempBt = bt;
                            for (x = 0; x < firstLength; x++) {
                                tempBt = enc(tempBt, (int[]) firstKeyBt.get(x));
                            }
                            encByte = tempBt;
                        }
                    }
                }
                encData = bt64ToHex(encByte);
            } else {
                int iterator = (leng / 4);
                int remainder = leng % 4;
                int i = 0;
                for (i = 0; i < iterator; i++) {
                    String tempData = data.substring(i * 4 + 0, i * 4 + 4);
                    int[] tempByte = strToBt(tempData);
                    int[] encByte = null;
                    if (firstKey != null && firstKey != "" && secondKey != null && secondKey != "" && thirdKey != null && thirdKey != "") {
                        int[] tempBt;
                        int x, y, z;
                        tempBt = tempByte;
                        for (x = 0; x < firstLength; x++) {
                            tempBt = enc(tempBt, (int[]) firstKeyBt.get(x));
                        }
                        for (y = 0; y < secondLength; y++) {
                            tempBt = enc(tempBt, (int[]) secondKeyBt.get(y));
                        }
                        for (z = 0; z < thirdLength; z++) {
                            tempBt = enc(tempBt, (int[]) thirdKeyBt.get(z));
                        }
                        encByte = tempBt;
                    } else {
                        if (firstKey != null && firstKey != "" && secondKey != null && secondKey != "") {
                            int[] tempBt;
                            int x, y;
                            tempBt = tempByte;
                            for (x = 0; x < firstLength; x++) {
                                tempBt = enc(tempBt, (int[]) firstKeyBt.get(x));
                            }
                            for (y = 0; y < secondLength; y++) {
                                tempBt = enc(tempBt, (int[]) secondKeyBt.get(y));
                            }
                            encByte = tempBt;
                        } else {
                            if (firstKey != null && firstKey != "") {
                                int[] tempBt;
                                int x;
                                tempBt = tempByte;
                                for (x = 0; x < firstLength; x++) {
                                    tempBt = enc(tempBt, (int[]) firstKeyBt.get(x));
                                }
                                encByte = tempBt;
                            }
                        }
                    }
                    encData += bt64ToHex(encByte);
                }
                if (remainder > 0) {
                String remainderData = data.substring(iterator * 4 + 0,
                leng);
                int[] tempByte = strToBt(remainderData);
                int[] encByte = null;
                if (firstKey != null && firstKey != "" && secondKey != null && secondKey != "" && thirdKey != null && thirdKey != "") {
                    int[] tempBt;
                    int x, y, z;
                    tempBt = tempByte;
                    for (x = 0; x < firstLength; x++) {
                        tempBt = enc(tempBt, (int[]) firstKeyBt.get(x));
                    }
                    for (y = 0; y < secondLength; y++) {
                        tempBt = enc(tempBt, (int[]) secondKeyBt.get(y));
                    }
                    for (z = 0; z < thirdLength; z++) {
                        tempBt = enc(tempBt, (int[]) thirdKeyBt.get(z));
                    }
                    encByte = tempBt;
                } else {
                    if (firstKey != null && firstKey != "" && secondKey != null && secondKey != "") {
                        int[] tempBt;
                        int x, y;
                        tempBt = tempByte;
                        for (x = 0; x < firstLength; x++) {
                            tempBt = enc(tempBt, (int[]) firstKeyBt.get(x));
                        }
                        for (y = 0; y < secondLength; y++) {
                            tempBt = enc(tempBt, (int[]) secondKeyBt.get(y));
                        }
                        encByte = tempBt;
                    } else {
                        if (firstKey != null && firstKey != "") {
                            int[] tempBt;
                            int x;
                            tempBt = tempByte;
                            for (x = 0; x < firstLength; x++) {
                                tempBt = enc(tempBt, (int[]) firstKeyBt.get(x));
                            }
                            encByte = tempBt;
                        }
                    }
                }
                encData += bt64ToHex(encByte);
                }
            }
        }
        return encData;
    }
    /*
    * decrypt the encrypted string to the original string
    * return the original string
    */
    public String strDec(String data, String firstKey, String secondKey, String thirdKey) {
        int leng = data.length();
        String decStr = "";
        List<int[]> firstKeyBt = null, secondKeyBt = null, thirdKeyBt = null;
        int firstLength = 0, secondLength = 0, thirdLength = 0;
        if (firstKey != null && firstKey != "") {
            firstKeyBt = getKeyBytes(firstKey);
            firstLength = firstKeyBt.size();
        }
        if (secondKey != null && secondKey != "") {
            secondKeyBt = getKeyBytes(secondKey);
            secondLength = secondKeyBt.size();
        }
        if (thirdKey != null && thirdKey != "") {
            thirdKeyBt = getKeyBytes(thirdKey);
            thirdLength = thirdKeyBt.size();
        }
        int iterator = leng / 16;
        int i = 0;
        for (i = 0; i < iterator; i++) {
            String tempData = data.substring(i * 16 + 0, i * 16 + 16);
            String strByte = hexToBt64(tempData);
            int[] intByte = new int[64];
            int j = 0;
            for (j = 0; j < 64; j++) {
                intByte[j] = Integer.parseInt(strByte.substring(j, j + 1));
            }
            int[] decByte = null;
            if (firstKey != null && firstKey != "" && secondKey != null && secondKey != "" && thirdKey != null && thirdKey != "") {
                int[] tempBt;
                int x, y, z;
                tempBt = intByte;
                for (x = thirdLength - 1; x >= 0; x--) {
                    tempBt = dec(tempBt, (int[]) thirdKeyBt.get(x));
                }
                for (y = secondLength - 1; y >= 0; y--) {
                    tempBt = dec(tempBt, (int[]) secondKeyBt.get(y));
                }
                for (z = firstLength - 1; z >= 0; z--) {
                    tempBt = dec(tempBt, (int[]) firstKeyBt.get(z));
                }
                decByte = tempBt;
            } else {
                if (firstKey != null && firstKey != "" && secondKey != null && secondKey != "") {
                    int[] tempBt;
                    int x, y;
                    tempBt = intByte;
                    for (x = secondLength - 1; x >= 0; x--) {
                        tempBt = dec(tempBt, (int[]) secondKeyBt.get(x));
                    }
                    for (y = firstLength - 1; y >= 0; y--) {
                        tempBt = dec(tempBt, (int[]) firstKeyBt.get(y));
                    }
                    decByte = tempBt;
                } else {
                    if (firstKey != null && firstKey != "") {
                        int[] tempBt;
                        int x;
                        tempBt = intByte;
                        for (x = firstLength - 1; x >= 0; x--) {
                            tempBt = dec(tempBt, (int[]) firstKeyBt.get(x));
                        }
                        decByte = tempBt;
                    }
                }
            }
            decStr += byteToString(decByte);
        }
        return decStr;
    }
    /*
    * chang the string into the bit array
    *
    * return bit array(it's length % 64 = 0)
    */
    public List<int[]> getKeyBytes(String key) {
        List<int[]> keyBytes = new ArrayList<int[]>();
        int leng = key.length();
        int iterator = (leng / 4);
        int remainder = leng % 4;
        int i = 0;
        for (i = 0; i < iterator; i++) {
            keyBytes.add(i, strToBt(key.substring(i * 4 + 0, i * 4 + 4)));
        }
        if (remainder > 0) {
            // keyBytes[i] = strToBt(key.substring(i*4+0,leng));
            keyBytes.add(i, strToBt(key.substring(i * 4 + 0, leng)));
        }
        return keyBytes;
    }
    /*
    * chang the string(it's length <= 4) into the bit array
    *
    * return bit array(it's length = 64)
    */
    public int[] strToBt(String str) {
        int leng = str.length();
        int[] bt = new int[64];
        if (leng < 4) {
        int i = 0, j = 0, p = 0, q = 0;
        for (i = 0; i < leng; i++) {
        int k = str.charAt(i);
        for (j = 0; j < 16; j++) {
        int pow = 1, m = 0;
        for (m = 15; m > j; m--) {
        pow *= 2;
        }
        // bt.set(16*i+j,""+(k/pow)%2));
        bt[16 * i + j] = (k / pow) % 2;
        }
        }
        for (p = leng; p < 4; p++) {
        int k = 0;
        for (q = 0; q < 16; q++) {
        int pow = 1, m = 0;
        for (m = 15; m > q; m--) {
        pow *= 2;
        }
        // bt[16*p+q]=parseInt(k/pow)%2;
        // bt.add(16*p+q,""+((k/pow)%2));
        bt[16 * p + q] = (k / pow) % 2;
        }
        }
        } else {
        for (int i = 0; i < 4; i++) {
        int k = str.charAt(i);
        for (int j = 0; j < 16; j++) {
        int pow = 1;
        for (int m = 15; m > j; m--) {
        pow *= 2;
        }
        // bt[16*i+j]=parseInt(k/pow)%2;
        // bt.add(16*i+j,""+((k/pow)%2));
        bt[16 * i + j] = (k / pow) % 2;
        }
        }
        }
        return bt;
    }
    /*
    * chang the bit(it's length = 4) into the hex
    *
    * return hex
    */
    public String bt4ToHex(String binary) {
        String hex = "";
        if (binary.equalsIgnoreCase("0000")) {
        hex = "0";
        } else if (binary.equalsIgnoreCase("0001")) {
        hex = "1";
        } else if (binary.equalsIgnoreCase("0010")) {
        hex = "2";
        } else if (binary.equalsIgnoreCase("0011")) {
        hex = "3";
        } else if (binary.equalsIgnoreCase("0100")) {
        hex = "4";
        } else if (binary.equalsIgnoreCase("0101")) {
        hex = "5";
        } else if (binary.equalsIgnoreCase("0110")) {
        hex = "6";
        } else if (binary.equalsIgnoreCase("0111")) {
        hex = "7";
        } else if (binary.equalsIgnoreCase("1000")) {
        hex = "8";
        } else if (binary.equalsIgnoreCase("1001")) {
        hex = "9";
        } else if (binary.equalsIgnoreCase("1010")) {
        hex = "A";
        } else if (binary.equalsIgnoreCase("1011")) {
        hex = "B";
        } else if (binary.equalsIgnoreCase("1100")) {
        hex = "C";
        } else if (binary.equalsIgnoreCase("1101")) {
        hex = "D";
        } else if (binary.equalsIgnoreCase("1110")) {
        hex = "E";
        } else if (binary.equalsIgnoreCase("1111")) {
        hex = "F";
        }
        return hex;
    }
    /*
    * chang the hex into the bit(it's length = 4)
    *
    * return the bit(it's length = 4)
    */
    public String hexToBt4(String hex) {
        String binary = "";
        if (hex.equalsIgnoreCase("0")) {
        binary = "0000";
        } else if (hex.equalsIgnoreCase("1")) {
        binary = "0001";
        }
        if (hex.equalsIgnoreCase("2")) {
        binary = "0010";
        }
        if (hex.equalsIgnoreCase("3")) {
        binary = "0011";
        }
        if (hex.equalsIgnoreCase("4")) {
        binary = "0100";
        }
        if (hex.equalsIgnoreCase("5")) {
        binary = "0101";
        }
        if (hex.equalsIgnoreCase("6")) {
        binary = "0110";
        }
        if (hex.equalsIgnoreCase("7")) {
        binary = "0111";
        }
        if (hex.equalsIgnoreCase("8")) {
        binary = "1000";
        }
        if (hex.equalsIgnoreCase("9")) {
        binary = "1001";
        }
        if (hex.equalsIgnoreCase("A")) {
        binary = "1010";
        }
        if (hex.equalsIgnoreCase("B")) {
        binary = "1011";
        }
        if (hex.equalsIgnoreCase("C")) {
        binary = "1100";
        }
        if (hex.equalsIgnoreCase("D")) {
        binary = "1101";
        }
        if (hex.equalsIgnoreCase("E")) {
        binary = "1110";
        }
        if (hex.equalsIgnoreCase("F")) {
        binary = "1111";
        }
        return binary;
    }
    /*
    * chang the bit(it's length = 64) into the string
    *
    * return string
    */
    public String byteToString(int[] byteData) {
        String str = "";
        for (int i = 0; i < 4; i++) {
        int count = 0;
        for (int j = 0; j < 16; j++) {
        int pow = 1;
        for (int m = 15; m > j; m--) {
        pow *= 2;
        }
        count += byteData[16 * i + j] * pow;
        }
        if (count != 0) {
        str += "" + (char) (count);
        }
        }
        return str;
    }
    public String bt64ToHex(int[] byteData) {
        String hex = "";
        for (int i = 0; i < 16; i++) {
        String bt = "";
        for (int j = 0; j < 4; j++) {
        bt += byteData[i * 4 + j];
        }
        hex += bt4ToHex(bt);
        }
        return hex;
    }
    public String hexToBt64(String hex) {
        String binary = "";
        for (int i = 0; i < 16; i++) {
        binary += hexToBt4(hex.substring(i, i + 1));
        }
        return binary;
    }
    /*
    * the 64 bit des core arithmetic
    */
    public int[] enc(int[] dataByte, int[] keyByte) {
        int[][] keys = generateKeys(keyByte);
        int[] ipByte = initPermute(dataByte);
        int[] ipLeft = new int[32];
        int[] ipRight = new int[32];
        int[] tempLeft = new int[32];
        int i = 0, j = 0, k = 0, m = 0, n = 0;
        for (k = 0; k < 32; k++) {
        ipLeft[k] = ipByte[k];
        ipRight[k] = ipByte[32 + k];
        }
        for (i = 0; i < 16; i++) {
        for (j = 0; j < 32; j++) {
        tempLeft[j] = ipLeft[j];
        ipLeft[j] = ipRight[j];
        }
        int[] key = new int[48];
        for (m = 0; m < 48; m++) {
        key[m] = keys[i][m];
        }
        int[] tempRight = xor(pPermute(sBoxPermute(xor(
        expandPermute(ipRight), key))), tempLeft);
        for (n = 0; n < 32; n++) {
        ipRight[n] = tempRight[n];
        }
        }
        int[] finalData = new int[64];
        for (i = 0; i < 32; i++) {
        finalData[i] = ipRight[i];
        finalData[32 + i] = ipLeft[i];
        }
        return finallyPermute(finalData);
    }
    public int[] dec(int[] dataByte, int[] keyByte) {
        int[][] keys = generateKeys(keyByte);
        int[] ipByte = initPermute(dataByte);
        int[] ipLeft = new int[32];
        int[] ipRight = new int[32];
        int[] tempLeft = new int[32];
        int i = 0, j = 0, k = 0, m = 0, n = 0;
        for (k = 0; k < 32; k++) {
        ipLeft[k] = ipByte[k];
        ipRight[k] = ipByte[32 + k];
        }
        for (i = 15; i >= 0; i--) {
        for (j = 0; j < 32; j++) {
        tempLeft[j] = ipLeft[j];
        ipLeft[j] = ipRight[j];
        }
        int[] key = new int[48];
        for (m = 0; m < 48; m++) {
        key[m] = keys[i][m];
        }
        int[] tempRight = xor(pPermute(sBoxPermute(xor(
        expandPermute(ipRight), key))), tempLeft);
        for (n = 0; n < 32; n++) {
        ipRight[n] = tempRight[n];
        }
        }
        int[] finalData = new int[64];
        for (i = 0; i < 32; i++) {
        finalData[i] = ipRight[i];
        finalData[32 + i] = ipLeft[i];
        }
        return finallyPermute(finalData);
    }
    public int[] initPermute(int[] originalData) {
        int[] ipByte = new int[64];
        int i = 0, m = 1, n = 0, j, k;
        for (i = 0, m = 1, n = 0; i < 4; i++, m += 2, n += 2) {
        for (j = 7, k = 0; j >= 0; j--, k++) {
        ipByte[i * 8 + k] = originalData[j * 8 + m];
        ipByte[i * 8 + k + 32] = originalData[j * 8 + n];
        }
        }
        return ipByte;
    }
    public int[] expandPermute(int[] rightData) {
        int[] epByte = new int[48];
        int i;
        for (i = 0; i < 8; i++) {
        if (i == 0) {
        epByte[i * 6 + 0] = rightData[31];
        } else {
        epByte[i * 6 + 0] = rightData[i * 4 - 1];
        }
        epByte[i * 6 + 1] = rightData[i * 4 + 0];
        epByte[i * 6 + 2] = rightData[i * 4 + 1];
        epByte[i * 6 + 3] = rightData[i * 4 + 2];
        epByte[i * 6 + 4] = rightData[i * 4 + 3];
        if (i == 7) {
        epByte[i * 6 + 5] = rightData[0];
        } else {
        epByte[i * 6 + 5] = rightData[i * 4 + 4];
        }
        }
        return epByte;
    }
    public int[] xor(int[] byteOne, int[] byteTwo) {
        // var xorByte = new Array(byteOne.length);
        // for(int i = 0;i < byteOne.length; i ++){
        // xorByte[i] = byteOne[i] ^ byteTwo[i];
        // }
        // return xorByte;
        int[] xorByte = new int[byteOne.length];
        for (int i = 0; i < byteOne.length; i++) {
        xorByte[i] = byteOne[i] ^ byteTwo[i];
        }
        return xorByte;
    }
    public int[] sBoxPermute(int[] expandByte) {
        // var sBoxByte = new Array(32);
        int[] sBoxByte = new int[32];
        String binary = "";
        int[][] s1 = {
        { 14, 4, 13, 1, 2, 15, 11, 8, 3, 10, 6, 12, 5, 9, 0, 7 },
        { 0, 15, 7, 4, 14, 2, 13, 1, 10, 6, 12, 11, 9, 5, 3, 8 },
        { 4, 1, 14, 8, 13, 6, 2, 11, 15, 12, 9, 7, 3, 10, 5, 0 },
        { 15, 12, 8, 2, 4, 9, 1, 7, 5, 11, 3, 14, 10, 0, 6, 13 } };
        /* Table - s2 */
        int[][] s2 = {
        { 15, 1, 8, 14, 6, 11, 3, 4, 9, 7, 2, 13, 12, 0, 5, 10 },
        { 3, 13, 4, 7, 15, 2, 8, 14, 12, 0, 1, 10, 6, 9, 11, 5 },
        { 0, 14, 7, 11, 10, 4, 13, 1, 5, 8, 12, 6, 9, 3, 2, 15 },
        { 13, 8, 10, 1, 3, 15, 4, 2, 11, 6, 7, 12, 0, 5, 14, 9 } };
        /* Table - s3 */
        int[][] s3 = {
        { 10, 0, 9, 14, 6, 3, 15, 5, 1, 13, 12, 7, 11, 4, 2, 8 },
        { 13, 7, 0, 9, 3, 4, 6, 10, 2, 8, 5, 14, 12, 11, 15, 1 },
        { 13, 6, 4, 9, 8, 15, 3, 0, 11, 1, 2, 12, 5, 10, 14, 7 },
        { 1, 10, 13, 0, 6, 9, 8, 7, 4, 15, 14, 3, 11, 5, 2, 12 } };
        /* Table - s4 */
        int[][] s4 = {
        { 7, 13, 14, 3, 0, 6, 9, 10, 1, 2, 8, 5, 11, 12, 4, 15 },
        { 13, 8, 11, 5, 6, 15, 0, 3, 4, 7, 2, 12, 1, 10, 14, 9 },
        { 10, 6, 9, 0, 12, 11, 7, 13, 15, 1, 3, 14, 5, 2, 8, 4 },
        { 3, 15, 0, 6, 10, 1, 13, 8, 9, 4, 5, 11, 12, 7, 2, 14 } };
        /* Table - s5 */
        int[][] s5 = {
        { 2, 12, 4, 1, 7, 10, 11, 6, 8, 5, 3, 15, 13, 0, 14, 9 },
        { 14, 11, 2, 12, 4, 7, 13, 1, 5, 0, 15, 10, 3, 9, 8, 6 },
        { 4, 2, 1, 11, 10, 13, 7, 8, 15, 9, 12, 5, 6, 3, 0, 14 },
        { 11, 8, 12, 7, 1, 14, 2, 13, 6, 15, 0, 9, 10, 4, 5, 3 } };
        /* Table - s6 */
        int[][] s6 = {
        { 12, 1, 10, 15, 9, 2, 6, 8, 0, 13, 3, 4, 14, 7, 5, 11 },
        { 10, 15, 4, 2, 7, 12, 9, 5, 6, 1, 13, 14, 0, 11, 3, 8 },
        { 9, 14, 15, 5, 2, 8, 12, 3, 7, 0, 4, 10, 1, 13, 11, 6 },
        { 4, 3, 2, 12, 9, 5, 15, 10, 11, 14, 1, 7, 6, 0, 8, 13 } };
        /* Table - s7 */
        int[][] s7 = {
        { 4, 11, 2, 14, 15, 0, 8, 13, 3, 12, 9, 7, 5, 10, 6, 1 },
        { 13, 0, 11, 7, 4, 9, 1, 10, 14, 3, 5, 12, 2, 15, 8, 6 },
        { 1, 4, 11, 13, 12, 3, 7, 14, 10, 15, 6, 8, 0, 5, 9, 2 },
        { 6, 11, 13, 8, 1, 4, 10, 7, 9, 5, 0, 15, 14, 2, 3, 12 } };
        /* Table - s8 */
        int[][] s8 = {
        { 13, 2, 8, 4, 6, 15, 11, 1, 10, 9, 3, 14, 5, 0, 12, 7 },
        { 1, 15, 13, 8, 10, 3, 7, 4, 12, 5, 6, 11, 0, 14, 9, 2 },
        { 7, 11, 4, 1, 9, 12, 14, 2, 0, 6, 10, 13, 15, 3, 5, 8 },
        { 2, 1, 14, 7, 4, 10, 8, 13, 15, 12, 9, 0, 3, 5, 6, 11 } };
        for (int m = 0; m < 8; m++) {
        int i = 0, j = 0;
        i = expandByte[m * 6 + 0] * 2 + expandByte[m * 6 + 5];
        j = expandByte[m * 6 + 1] * 2 * 2 * 2 + expandByte[m * 6 + 2] * 2
        * 2 + expandByte[m * 6 + 3] * 2 + expandByte[m * 6 + 4];
        switch (m) {
        case 0:
        binary = getBoxBinary(s1[i][j]);
        break;
        case 1:
        binary = getBoxBinary(s2[i][j]);
        break;
        case 2:
        binary = getBoxBinary(s3[i][j]);
        break;
        case 3:
        binary = getBoxBinary(s4[i][j]);
        break;
        case 4:
        binary = getBoxBinary(s5[i][j]);
        break;
        case 5:
        binary = getBoxBinary(s6[i][j]);
        break;
        case 6:
        binary = getBoxBinary(s7[i][j]);
        break;
        case 7:
        binary = getBoxBinary(s8[i][j]);
        break;
        }
        sBoxByte[m * 4 + 0] = Integer.parseInt(binary.substring(0, 1));
        sBoxByte[m * 4 + 1] = Integer.parseInt(binary.substring(1, 2));
        sBoxByte[m * 4 + 2] = Integer.parseInt(binary.substring(2, 3));
        sBoxByte[m * 4 + 3] = Integer.parseInt(binary.substring(3, 4));
        }
        return sBoxByte;
    }
    public int[] pPermute(int[] sBoxByte) {
        int[] pBoxPermute = new int[32];
        pBoxPermute[0] = sBoxByte[15];
        pBoxPermute[1] = sBoxByte[6];
        pBoxPermute[2] = sBoxByte[19];
        pBoxPermute[3] = sBoxByte[20];
        pBoxPermute[4] = sBoxByte[28];
        pBoxPermute[5] = sBoxByte[11];
        pBoxPermute[6] = sBoxByte[27];
        pBoxPermute[7] = sBoxByte[16];
        pBoxPermute[8] = sBoxByte[0];
        pBoxPermute[9] = sBoxByte[14];
        pBoxPermute[10] = sBoxByte[22];
        pBoxPermute[11] = sBoxByte[25];
        pBoxPermute[12] = sBoxByte[4];
        pBoxPermute[13] = sBoxByte[17];
        pBoxPermute[14] = sBoxByte[30];
        pBoxPermute[15] = sBoxByte[9];
        pBoxPermute[16] = sBoxByte[1];
        pBoxPermute[17] = sBoxByte[7];
        pBoxPermute[18] = sBoxByte[23];
        pBoxPermute[19] = sBoxByte[13];
        pBoxPermute[20] = sBoxByte[31];
        pBoxPermute[21] = sBoxByte[26];
        pBoxPermute[22] = sBoxByte[2];
        pBoxPermute[23] = sBoxByte[8];
        pBoxPermute[24] = sBoxByte[18];
        pBoxPermute[25] = sBoxByte[12];
        pBoxPermute[26] = sBoxByte[29];
        pBoxPermute[27] = sBoxByte[5];
        pBoxPermute[28] = sBoxByte[21];
        pBoxPermute[29] = sBoxByte[10];
        pBoxPermute[30] = sBoxByte[3];
        pBoxPermute[31] = sBoxByte[24];
        return pBoxPermute;
    }
    public int[] finallyPermute(int[] endByte) {
        int[] fpByte = new int[64];
        fpByte[0] = endByte[39];
        fpByte[1] = endByte[7];
        fpByte[2] = endByte[47];
        fpByte[3] = endByte[15];
        fpByte[4] = endByte[55];
        fpByte[5] = endByte[23];
        fpByte[6] = endByte[63];
        fpByte[7] = endByte[31];
        fpByte[8] = endByte[38];
        fpByte[9] = endByte[6];
        fpByte[10] = endByte[46];
        fpByte[11] = endByte[14];
        fpByte[12] = endByte[54];
        fpByte[13] = endByte[22];
        fpByte[14] = endByte[62];
        fpByte[15] = endByte[30];
        fpByte[16] = endByte[37];
        fpByte[17] = endByte[5];
        fpByte[18] = endByte[45];
        fpByte[19] = endByte[13];
        fpByte[20] = endByte[53];
        fpByte[21] = endByte[21];
        fpByte[22] = endByte[61];
        fpByte[23] = endByte[29];
        fpByte[24] = endByte[36];
        fpByte[25] = endByte[4];
        fpByte[26] = endByte[44];
        fpByte[27] = endByte[12];
        fpByte[28] = endByte[52];
        fpByte[29] = endByte[20];
        fpByte[30] = endByte[60];
        fpByte[31] = endByte[28];
        fpByte[32] = endByte[35];
        fpByte[33] = endByte[3];
        fpByte[34] = endByte[43];
        fpByte[35] = endByte[11];
        fpByte[36] = endByte[51];
        fpByte[37] = endByte[19];
        fpByte[38] = endByte[59];
        fpByte[39] = endByte[27];
        fpByte[40] = endByte[34];
        fpByte[41] = endByte[2];
        fpByte[42] = endByte[42];
        fpByte[43] = endByte[10];
        fpByte[44] = endByte[50];
        fpByte[45] = endByte[18];
        fpByte[46] = endByte[58];
        fpByte[47] = endByte[26];
        fpByte[48] = endByte[33];
        fpByte[49] = endByte[1];
        fpByte[50] = endByte[41];
        fpByte[51] = endByte[9];
        fpByte[52] = endByte[49];
        fpByte[53] = endByte[17];
        fpByte[54] = endByte[57];
        fpByte[55] = endByte[25];
        fpByte[56] = endByte[32];
        fpByte[57] = endByte[0];
        fpByte[58] = endByte[40];
        fpByte[59] = endByte[8];
        fpByte[60] = endByte[48];
        fpByte[61] = endByte[16];
        fpByte[62] = endByte[56];
        fpByte[63] = endByte[24];
        return fpByte;
    }
    public String getBoxBinary(int i) {
        String binary = "";
        switch (i) {
        case 0:
        binary = "0000";
        break;
        case 1:
        binary = "0001";
        break;
        case 2:
        binary = "0010";
        break;
        case 3:
        binary = "0011";
        break;
        case 4:
        binary = "0100";
        break;
        case 5:
        binary = "0101";
        break;
        case 6:
        binary = "0110";
        break;
        case 7:
        binary = "0111";
        break;
        case 8:
        binary = "1000";
        break;
        case 9:
        binary = "1001";
        break;
        case 10:
        binary = "1010";
        break;
        case 11:
        binary = "1011";
        break;
        case 12:
        binary = "1100";
        break;
        case 13:
        binary = "1101";
        break;
        case 14:
        binary = "1110";
        break;
        case 15:
        binary = "1111";
        break;
        }
        return binary;
    }
    /*
    * generate 16 keys for xor
    *
    */
    public int[][] generateKeys(int[] keyByte) {
        int[] key = new int[56];
        int[][] keys = new int[16][48];
        // keys[ 0] = new Array();
        // keys[ 1] = new Array();
        // keys[ 2] = new Array();
        // keys[ 3] = new Array();
        // keys[ 4] = new Array();
        // keys[ 5] = new Array();
        // keys[ 6] = new Array();
        // keys[ 7] = new Array();
        // keys[ 8] = new Array();
        // keys[ 9] = new Array();
        // keys[10] = new Array();
        // keys[11] = new Array();
        // keys[12] = new Array();
        // keys[13] = new Array();
        // keys[14] = new Array();
        // keys[15] = new Array();
        int[] loop = new int[] { 1, 1, 2, 2, 2, 2, 2, 2, 1, 2, 2, 2, 2, 2, 2, 1 };
        for (int i = 0; i < 7; i++) {
        for (int j = 0, k = 7; j < 8; j++, k--) {
        key[i * 8 + j] = keyByte[8 * k + i];
        }
        }
        int i = 0;
        for (i = 0; i < 16; i++) {
        int tempLeft = 0;
        int tempRight = 0;
        for (int j = 0; j < loop[i]; j++) {
        tempLeft = key[0];
        tempRight = key[28];
        for (int k = 0; k < 27; k++) {
        key[k] = key[k + 1];
        key[28 + k] = key[29 + k];
        }
        key[27] = tempLeft;
        key[55] = tempRight;
        }
        // var tempKey = new Array(48);
        int[] tempKey = new int[48];
        tempKey[0] = key[13];
        tempKey[1] = key[16];
        tempKey[2] = key[10];
        tempKey[3] = key[23];
        tempKey[4] = key[0];
        tempKey[5] = key[4];
        tempKey[6] = key[2];
        tempKey[7] = key[27];
        tempKey[8] = key[14];
        tempKey[9] = key[5];
        tempKey[10] = key[20];
        tempKey[11] = key[9];
        tempKey[12] = key[22];
        tempKey[13] = key[18];
        tempKey[14] = key[11];
        tempKey[15] = key[3];
        tempKey[16] = key[25];
        tempKey[17] = key[7];
        tempKey[18] = key[15];
        tempKey[19] = key[6];
        tempKey[20] = key[26];
        tempKey[21] = key[19];
        tempKey[22] = key[12];
        tempKey[23] = key[1];
        tempKey[24] = key[40];
        tempKey[25] = key[51];
        tempKey[26] = key[30];
        tempKey[27] = key[36];
        tempKey[28] = key[46];
        tempKey[29] = key[54];
        tempKey[30] = key[29];
        tempKey[31] = key[39];
        tempKey[32] = key[50];
        tempKey[33] = key[44];
        tempKey[34] = key[32];
        tempKey[35] = key[47];
        tempKey[36] = key[43];
        tempKey[37] = key[48];
        tempKey[38] = key[38];
        tempKey[39] = key[55];
        tempKey[40] = key[33];
        tempKey[41] = key[52];
        tempKey[42] = key[45];
        tempKey[43] = key[41];
        tempKey[44] = key[49];
        tempKey[45] = key[35];
        tempKey[46] = key[28];
        tempKey[47] = key[31];
        int m;
        switch (i) {
        case 0:
        for (m = 0; m < 48; m++) {
        keys[0][m] = tempKey[m];
        }
        break;
        case 1:
        for (m = 0; m < 48; m++) {
        keys[1][m] = tempKey[m];
        }
        break;
        case 2:
        for (m = 0; m < 48; m++) {
        keys[2][m] = tempKey[m];
        }
        break;
        case 3:
        for (m = 0; m < 48; m++) {
        keys[3][m] = tempKey[m];
        }
        break;
        case 4:
        for (m = 0; m < 48; m++) {
        keys[4][m] = tempKey[m];
        }
        break;
        case 5:
        for (m = 0; m < 48; m++) {
        keys[5][m] = tempKey[m];
        }
        break;
        case 6:
        for (m = 0; m < 48; m++) {
        keys[6][m] = tempKey[m];
        }
        break;
        case 7:
        for (m = 0; m < 48; m++) {
        keys[7][m] = tempKey[m];
        }
        break;
        case 8:
        for (m = 0; m < 48; m++) {
        keys[8][m] = tempKey[m];
        }
        break;
        case 9:
        for (m = 0; m < 48; m++) {
        keys[9][m] = tempKey[m];
        }
        break;
        case 10:
        for (m = 0; m < 48; m++) {
        keys[10][m] = tempKey[m];
        }
        break;
        case 11:
        for (m = 0; m < 48; m++) {
        keys[11][m] = tempKey[m];
        }
        break;
        case 12:
        for (m = 0; m < 48; m++) {
        keys[12][m] = tempKey[m];
        }
        break;
        case 13:
        for (m = 0; m < 48; m++) {
        keys[13][m] = tempKey[m];
        }
        break;
        case 14:
        for (m = 0; m < 48; m++) {
        keys[14][m] = tempKey[m];
        }
        break;
        case 15:
        for (m = 0; m < 48; m++) {
        keys[15][m] = tempKey[m];
        }
        break;
        }
        }
        return keys;
    }
}
